home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / hypercrd / xcmd / sprtxtrn.sea / Support Tools eXternals 1.2.5 / card_36875.txt < prev    next >
Text File  |  1990-11-13  |  1KB  |  58 lines
  1. -- card: 36875 from stack: in.5
  2. -- bmap block id: 17574
  3. -- flags: 0000
  4. -- background id: 3858
  5. -- name: MFIsRunning
  6. ----- HyperTalk script -----
  7. on HideObjects
  8.   hide cd btn "Try It!"
  9. end HideObjects
  10.  
  11. on ShowObjects
  12.   show cd btn "Try It!"
  13. end ShowObjects
  14.  
  15.  
  16. -- part 1 (button)
  17. -- low flags: 00
  18. -- high flags: A002
  19. -- rect: left=82 top=185 right=219 bottom=175
  20. -- title width / last selected line: 0
  21. -- icon id / first selected line: 0 / 0
  22. -- text alignment: 1
  23. -- font id: 0
  24. -- text size: 12
  25. -- style flags: 8192
  26. -- line height: 16
  27. -- part name: Try it!
  28. ----- HyperTalk script -----
  29. on mouseUp
  30.   global errGlobal
  31.   put MFIsRunning("noDialog:errGlobal") into MFActive
  32.   if errGlobal Γëá empty then
  33.     answer "Error: ΓÇ£" & errGlobal & "ΓÇ¥"
  34.     put empty into errGlobal
  35.   else
  36.     if MFActive = true then
  37.       put "is" into theVerb
  38.     else
  39.       put "is not" into theVerb
  40.     end if
  41.     answer "MultiFinder" && theVerb && "active."
  42.   end if
  43. end mouseUp
  44.  
  45.  
  46.  
  47.  
  48. -- part contents for background part 38
  49. ----- text -----
  50. 29/50
  51.  
  52. -- part contents for background part 20
  53. ----- text -----
  54.      Indicates whether MultiFinder is currently running.   This information is especially useful when launching applications from HyperCard as the state of HyperCard upon returning from an application is quite different when under Finder and MultiFinder (ie. all global variable values are lost when under Finder, etc.).
  55.  
  56.      Calling syntax : MFIsRunning(<ΓÇ£noDialogΓÇ¥:errorGlobal>)
  57.  
  58.      Returns "TRUE" or "FALSE".